home *** CD-ROM | disk | FTP | other *** search
/ Immoral Angel 1 / Immoral Angel 1.iso / mac / MSTR / PROGRAM / PLAY.DIR / 00006.ls < prev    next >
Encoding:
Text File  |  1997-07-10  |  2.1 KB  |  76 lines

  1. on about
  2.   global status
  3.   eracemenudownbutton()
  4.   stopqt()
  5.   set status to "about"
  6.   puppetSprite(19, 1)
  7.   set the type of sprite 19 to 1
  8.   set the ink of sprite 19 to 0
  9.   set the foreColor of sprite 19 to 255
  10.   set the backColor of sprite 19 to 0
  11.   set the castNum of sprite 19 to the number of member "about"
  12.   set the locH of sprite 19 to 320
  13.   set the locV of sprite 19 to 180
  14.   updateStage()
  15. end
  16.  
  17. on exitalart
  18.   global status
  19.   eracemenudownbutton()
  20.   stopqt()
  21.   set status to "exitAlart"
  22.   puppetSprite(19, 1)
  23.   set the type of sprite 19 to 1
  24.   set the ink of sprite 19 to 0
  25.   set the foreColor of sprite 19 to 255
  26.   set the backColor of sprite 19 to 0
  27.   set the castNum of sprite 19 to the number of member "exitDialog"
  28.   set the locH of sprite 19 to 320
  29.   set the locV of sprite 19 to 240
  30.   updateStage()
  31.   puppetSprite(20, 1)
  32.   set the type of sprite 20 to 1
  33.   set the ink of sprite 20 to 0
  34.   set the foreColor of sprite 20 to 255
  35.   set the backColor of sprite 20 to 0
  36.   set the castNum of sprite 20 to the number of member "cancel,up"
  37.   set the locH of sprite 20 to 192
  38.   set the locV of sprite 20 to 251
  39.   updateStage()
  40.   puppetSprite(21, 1)
  41.   set the type of sprite 21 to 1
  42.   set the ink of sprite 21 to 0
  43.   set the foreColor of sprite 21 to 255
  44.   set the backColor of sprite 21 to 0
  45.   set the castNum of sprite 21 to the number of member "yes,up"
  46.   set the locH of sprite 21 to 322
  47.   set the locV of sprite 21 to 251
  48.   updateStage()
  49. end
  50.  
  51. on helpmenu
  52.   global status
  53.   eracemenudownbutton()
  54.   stopqt()
  55.   unLoad()
  56.   set status to "helpMenu"
  57.   puppetSprite(19, 1)
  58.   set the type of sprite 19 to 1
  59.   set the ink of sprite 19 to 0
  60.   set the foreColor of sprite 19 to 255
  61.   set the backColor of sprite 19 to 0
  62.   set the castNum of sprite 19 to the number of member "help1"
  63.   set the locH of sprite 19 to 320
  64.   set the locV of sprite 19 to 251
  65.   updateStage()
  66.   puppetSprite(22, 1)
  67.   set the type of sprite 22 to 1
  68.   set the ink of sprite 22 to 0
  69.   set the foreColor of sprite 22 to 255
  70.   set the backColor of sprite 22 to 0
  71.   set the castNum of sprite 22 to the number of member "closeHelp,up"
  72.   set the locH of sprite 22 to 42
  73.   set the locV of sprite 22 to 32
  74.   updateStage()
  75. end
  76.